home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-02 / fgl110c.zip / 09-21.C < prev    next >
Text File  |  1992-01-31  |  643b  |  39 lines

  1. #include <fastgraf.h>
  2. #include <stdio.h>
  3. #include <stdlib.h>
  4.  
  5. void main(void);
  6.  
  7. void main()
  8. {
  9.    int old_mode;
  10.    char image[8];
  11.  
  12.    old_mode = fg_getmode();
  13.  
  14.    if (fg_testmode(3,1))
  15.       fg_setmode(3);
  16.    else if (fg_testmode(7,1))
  17.       fg_setmode(7);
  18.    else {
  19.       printf("This program requires\n");
  20.       printf("an 80-column display.\n");
  21.       exit(1);
  22.       }
  23.  
  24.    fg_cursor(0);
  25.  
  26.    fg_setattr(9,7,0);
  27.    fg_text("text",4);
  28.    fg_waitkey();
  29.  
  30.    fg_locate(0,0);
  31.    fg_getimage(image,8,1);
  32.    fg_locate(1,1);
  33.    fg_drwimage(image,8,1);
  34.    fg_waitkey();
  35.  
  36.    fg_setmode(old_mode);
  37.    fg_reset();
  38. }
  39.